namespace eval chat {
	
	proc createChat {} {
		set p $::ui::Frames(content,chat)
		pack [label $p.label -text World!]
		
	}
	::hook::add finload [namespace current]::createChat
}